projects
/
emacs.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
2e17852
)
(mh-folder-exists-p): Change test from an empty buffer, to one that
author
Bill Wohler
<wohler@newt.com>
Fri, 2 Jun 2006 18:47:44 +0000
(18:47 +0000)
committer
Bill Wohler
<wohler@newt.com>
Fri, 2 Jun 2006 18:47:44 +0000
(18:47 +0000)
contains the actual folder, since GNU mailutils' folder command
displays output if the folder doesn't exist (closes SF #
1499712
).
lisp/mh-e/mh-search.el
patch
|
blob
|
history
diff --git
a/lisp/mh-e/mh-search.el
b/lisp/mh-e/mh-search.el
index 14891204fade97a2b2a48350f21211e1051af4f5..b6f8dd71d9a4c6ad3fe2467b6fceb3cd26c838af 100644
(file)
--- a/
lisp/mh-e/mh-search.el
+++ b/
lisp/mh-e/mh-search.el
@@
-1524,7
+1524,7
@@
construct the base name."
(with-temp-buffer
(mh-exec-cmd-output "folder" nil "-fast" "-nocreate" folder)
(goto-char (point-min))
- (
not (eobp
))))))
+ (
looking-at (format "+?%s" folder
))))))
(defun mh-msg-exists-p (msg folder)
"Check if MSG exists in FOLDER."